home *** CD-ROM | disk | FTP | other *** search
- object MappingEditor: TMappingEditor
- Left = 241
- Top = 134
- AutoScroll = False
- Caption = 'Field Mapping Definition'
- ClientHeight = 270
- ClientWidth = 426
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- PixelsPerInch = 96
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- TextHeight = 13
- object Bevel1: TBevel
- Left = 7
- Top = 33
- Width = 312
- Height = 65
- end
- object LblSource: TLabel
- Left = 13
- Top = 7
- Width = 92
- Height = 18
- AutoSize = False
- Caption = 'Source Field:'
- end
- object LblTarget: TLabel
- Left = 13
- Top = 46
- Width = 92
- Height = 19
- AutoSize = False
- Caption = 'Target Field:'
- end
- object LblType: TLabel
- Left = 111
- Top = 46
- Width = 66
- Height = 19
- AutoSize = False
- Caption = 'DataType'
- end
- object LblSize: TLabel
- Left = 189
- Top = 46
- Width = 36
- Height = 19
- AutoSize = False
- Caption = 'Size'
- end
- object GridMapping: TStringGrid
- Left = 8
- Top = 120
- Width = 311
- Height = 97
- DefaultColWidth = 70
- DefaultRowHeight = 20
- RowCount = 1
- FixedRows = 0
- Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
- ScrollBars = ssVertical
- TabOrder = 5
- OnClick = GridMappingClick
- ColWidths = (
- 70
- 70
- 71
- 38
- 36)
- end
- object BtnAdd: TButton
- Left = 328
- Top = 32
- Width = 88
- Height = 25
- Caption = '&Add'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 6
- OnClick = BtnAddClick
- end
- object BtnDelete: TButton
- Left = 328
- Top = 96
- Width = 88
- Height = 25
- Caption = '&Delete'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 7
- OnClick = BtnDeleteClick
- end
- object BtnAddAll: TButton
- Left = 328
- Top = 64
- Width = 88
- Height = 25
- Caption = 'Add All'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 8
- OnClick = BtnAddAllClick
- end
- object BtnDelAll: TButton
- Left = 328
- Top = 128
- Width = 88
- Height = 25
- Caption = 'Delete All'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 9
- OnClick = BtnDelAllClick
- end
- object BtnOk: TBitBtn
- Left = 62
- Top = 232
- Width = 89
- Height = 25
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 10
- OnClick = BtnOkClick
- Kind = bkOK
- end
- object BtnCancel: TBitBtn
- Left = 166
- Top = 232
- Width = 89
- Height = 25
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 11
- OnClick = BtnCancelClick
- Kind = bkCancel
- end
- object CbxType: TComboBox
- Left = 111
- Top = 65
- Width = 72
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- OnChange = CbxTypeChange
- end
- object EdtSize: TMaskEdit
- Left = 189
- Top = 65
- Width = 40
- Height = 20
- EditMask = '99999;0; '
- MaxLength = 5
- TabOrder = 3
- end
- object CbEvent: TCheckBox
- Left = 241
- Top = 72
- Width = 72
- Height = 13
- Caption = 'FieldEvent'
- TabOrder = 4
- end
- object CbxSource: TComboBox
- Left = 111
- Top = 7
- Width = 117
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = CbxSourceChange
- end
- object CbxTarget: TComboBox
- Left = 13
- Top = 65
- Width = 92
- Height = 21
- ItemHeight = 13
- TabOrder = 1
- end
- object GridHeading: THeader
- Left = 8
- Top = 104
- Width = 311
- Height = 17
- AllowResize = False
- Sections.Sections = (
- #0'70'#0'Source'
- #0'39'#0'Target')
- TabOrder = 12
- end
- object BtnHelp: TBitBtn
- Left = 270
- Top = 232
- Width = 89
- Height = 25
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 13
- OnClick = BtnHelpClick
- Kind = bkHelp
- end
- object BtnLoad: TButton
- Left = 328
- Top = 160
- Width = 89
- Height = 25
- Caption = '&Load'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 14
- OnClick = BtnLoadClick
- end
- object BtnSave: TButton
- Left = 328
- Top = 192
- Width = 89
- Height = 25
- Caption = '&Save'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 15
- OnClick = BtnSaveClick
- end
- object LoadDialog: TOpenDialog
- DefaultExt = 'txt'
- FileEditStyle = fsEdit
- Filter =
- 'Text Files|*.txt|Ini Files|*.ini|Configuration Files|*.sys|All F' +
- 'iles|*.*'
- Options = [ofPathMustExist, ofFileMustExist]
- Title = 'Load From File'
- Left = 8
- Top = 240
- end
- object SaveDialog: TSaveDialog
- DefaultExt = 'txt'
- FileEditStyle = fsEdit
- Filter =
- 'Text Files|*.txt|Ini Files|*.ini|Configuration Files|*.sys|All F' +
- 'iles|*.*'
- Options = [ofOverwritePrompt, ofPathMustExist]
- Title = 'Save To File'
- Left = 8
- Top = 216
- end
- end
-